home *** CD-ROM | disk | FTP | other *** search
/ BBS in a Box 7 / BBS in a Box - Macintosh - Volume VII (BBS in a Box) (January 1993).iso / Files / Hyper / M-Md / MacUser.cpt / MacUser MiniFinders / MacUser MiniFinders / background_41536.txt < prev    next >
Encoding:
Text File  |  1990-07-06  |  1.3 KB  |  62 lines

  1. -- background: 41536 from stack: in
  2. -- bmap block id: 76437
  3. -- flags: 0000
  4. -- background id: 0
  5. -- name: shell
  6.  
  7.  
  8. -- part 5 (field)
  9. -- low flags: 01
  10. -- high flags: 0000
  11. -- rect: left=248 top=5 right=22 bottom=512
  12. -- title width / last selected line: 0
  13. -- icon id / first selected line: 0 / 0
  14. -- text alignment: 0
  15. -- font id: 136
  16. -- text size: 12
  17. -- style flags: 0
  18. -- line height: 16
  19. -- part name: Instructions
  20.  
  21.  
  22. -- part 6 (button)
  23. -- low flags: 00
  24. -- high flags: 2001
  25. -- rect: left=16 top=255 right=285 bottom=46
  26. -- title width / last selected line: 0
  27. -- icon id / first selected line: 7449 / 7449
  28. -- text alignment: 1
  29. -- font id: 0
  30. -- text size: 12
  31. -- style flags: 0
  32. -- line height: 16
  33. -- part name: Find
  34. ----- HyperTalk script -----
  35. on mouseUp
  36.   answer " You are already here." with "OK"
  37. end mouseUp
  38.  
  39.  
  40.  
  41. -- part 7 (button)
  42. -- low flags: 00
  43. -- high flags: 2001
  44. -- rect: left=16 top=297 right=327 bottom=46
  45. -- title width / last selected line: 0
  46. -- icon id / first selected line: 27267 / 27267
  47. -- text alignment: 1
  48. -- font id: 0
  49. -- text size: 12
  50. -- style flags: 0
  51. -- line height: 16
  52. -- part name: Quit
  53. ----- HyperTalk script -----
  54. on mouseUp
  55.   answer "Do you want to Quit or go Home?" with "Quit" or "Home" or "Cancel"
  56.   if it is "Cancel" then exit mouseUp
  57.   if it is "Quit" then
  58.     DoMenu "Quit Hypercard"
  59.   else go home
  60. end mouseUp
  61.  
  62.